
Partial Class CatalogPart
    Inherits System.Web.UI.Page

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.WebPartManager1.DisplayMode = WebPartManager.CatalogDisplayMode
    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Try
            Me.WebPartZone1.WebParts(0).Title = "The Command Button"
            Me.WebPartZone2.WebParts(0).Title = "The TextBox"
            Me.WebPartZone3.WebParts(0).Title = "The LinkButton"
        Catch
        End Try
    End Sub
End Class
